home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 23 / AACD 23.iso / AACD / Online / TruncateMail / TruncateFolder.yam_old_YAM2 < prev    next >
Text File  |  1992-08-23  |  684b  |  25 lines

  1. /********************************************
  2.  *     TruncateFolder arexx script v1.0     *
  3.  *     Author: Marek "March" Szyprowski     *
  4.  *       E-mail: march@staszic.waw.pl       *
  5.  *            Date: 23.08.2000              *
  6.  * * * * * * * * * * * ** * * * * * * * * * *
  7.  * Requiments: Yam 2.0+, TruncateMail v3.0+ *
  8.  ********************************************/
  9.  
  10. OPTIONS RESULTS
  11.  
  12. ADDRESS YAM FOLDERINFO 
  13.   
  14. finfo = reverse(result)
  15. parse var finfo . . . . fpath .                                 
  16. fpath = reverse(fpath)
  17.                 
  18. text = "Processing mail files in dir '"||fpath||"'..."
  19.  
  20. ADDRESS YAM 'APPBUSY "'||text||'"'
  21.   
  22. ADDRESS COMMAND 'truncatemail '||fpath||'/0#? checkdate'
  23.  
  24. ADDRESS "YAM" APPNOBUSY
  25.